home *** CD-ROM | disk | FTP | other *** search
/ Inventor Labs: Transportation / InventorLabs - Transportation.iso / pc / builders / media / netacess / url95.dir / 00012_Script_12 < prev    next >
Text File  |  1996-10-10  |  431b  |  19 lines
  1. on exitFrame
  2.   global TheWeb, WebError
  3.   
  4.   --
  5.   -- Use this handler to launch on a windows machine
  6.   -- when the user has installed any system other than AOL
  7.   --
  8.   
  9.  
  10.   
  11.   if objectP(TheWeb) then
  12.     
  13.     set WebError = TheWeb(mOpenURL,"http://www.hminet.com","","")
  14.     if WebError <> 0 then
  15.       set the text of member "ErrorReport" to TheWeb(mGetWebError,WebError)
  16.       go "Continue"
  17.     end if
  18.   end if
  19. end